home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 87xx / 8705.d64 / bild teilen (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  470b  |  13 lines
  1. 10 INPUT"NAME ";NE$
  2. 20 NA$="[129]PIC ? "+NE$+"*":SYS(57812)NA$,8,1
  3. 40 REM  ^ KOALAPAINTERBILD LADEN
  4. 60 POKE780,0:SYS65493
  5. 70 PRINT"DISKETTE WECHSELN!":POKE198,0:WAIT198,1:POKE198,0
  6. 90 REM  ^ WIE DER TEXT SCHON SAGT...
  7. 110 PRINT"HIRESBEREICH WIRD ABGESPEICHERT.":POKE193,0:POKE194,96
  8. 120 POKE174,64:POKE175,127:SYS(57812)"H"+NE$,8:SYS62957
  9. 140 REM ^ HIRES ABSPEICHERN...
  10. 160 PRINT"FARBBEREICH WIRD ABGESPEICHERT.":POKE193,64:POKE194,127
  11. 170 POKE174,17:POKE175,135:SYS(57812)"F"+NE$,8:SYS62957
  12. 190 REM ^ FARBE ABSPEICHERN ... FERTIG!
  13.